home *** CD-ROM | disk | FTP | other *** search
/ APC & TCP 4 / APC & TCP 4.iso / games / publicdomain / a / attacks / sources / mdgenerallib.def < prev    next >
Text File  |  1994-05-14  |  721b  |  22 lines
  1. DEFINITION MODULE mdgenerallib;
  2.  
  3. (*      This is a general library of procedures that I like and use in    *)
  4. (* in various ways.  Nothing special about the grouping other than that   *)
  5. (* they are things that I personally think are useful.                    *)
  6. (*         - MD                                                           *)
  7.  
  8.  
  9. (*********************************************************)
  10.  
  11. PROCEDURE MyPause (time : CARDINAL);
  12.         (* Pauses for number of seconds input *)
  13.  
  14. (********************************************************)
  15.  
  16. PROCEDURE RealRandom () : REAL;
  17.         (* Returns a random number in the range [0, 1). *)
  18.  
  19. (********************************************************)
  20.  
  21. END mdgenerallib.
  22.